home *** CD-ROM | disk | FTP | other *** search
/ NeXT Education Software Sampler 1992 Fall / NeXT Education Software Sampler 1992 Fall.iso / Programming / Source / tess / tess-1.0 / cm.m < prev    next >
Encoding:
Text File  |  1992-06-30  |  891 b   |  54 lines
  1. #import "aGroup-inter.h"
  2. #import "aGroup.h"
  3. #import "cm.h"
  4.  
  5. @implementation cm
  6. - defaultConfig
  7. {
  8.   [self noAngleSetup];
  9.   return self;
  10. }
  11.  
  12. - resizeGenerator
  13. {
  14.   latticesize.height = frame.size.height;
  15.   latticesize.width = frame.size.width;
  16.   upx = latticesize.width / 2;
  17.   upy = latticesize.height ;
  18.   overx = latticesize.width;
  19.   gravy = 0.0;
  20.   gravx = overx/2;
  21.   return self;
  22. }
  23.  
  24. - clip: (NXCoord) x: (NXCoord) y 
  25. { 
  26.   PSmoveto(x,y);
  27.   PSrlineto(upx,upy);
  28.   PSrlineto(upx,-upy);
  29.   PSclosepath();
  30.   PSclip();
  31.   return self;
  32. }
  33.  
  34. - makeLatticeUnitAt: (NXPoint *) point fromImage: srcimg 
  35. {
  36.   id imgrep;
  37.   NXPoint pt;
  38.   
  39.   pt.x = - point->x ;
  40.   pt.y = - point->y ;
  41.   imgrep = [srcimg bestRepresentation];
  42.   PSgsave();
  43.   [self clip:0.0:0.0];
  44.   [imgrep drawAt: &pt];
  45.   PSgrestore();
  46.   PSgsave();
  47.   reflect(0.0);
  48.   [self clip:0.0:0.0];
  49.   [imgrep drawAt: &pt];
  50.   PSgrestore();
  51.   return self;
  52. }
  53. @end
  54.